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NUMBER 7 VOLUME ONE June 15.1979 

CHECKERS in the last issue had one typo; in line 1220 where part of the line read: 

@((S+R)+2)=3; and it should have read: @((S+R)$2)=3; 

An error in line 8 had too many zeros at 30)6)60. 

I've had many comments on this program, all pleased with the effect and operation 
(once the glitch was cleared up). 

PROOFREADI NG of listings is getting better, and hopefully I'm not going to have 
any more problems as I am now sending a copy of the ready-to-print listing to the 
author for his last minute check. 


GIANT LETTERS program on p.45 can be 'clarified' by replacing line 105 with the 
statement X=0; GOSUB C . The zero will stop the machine's printing after it 
finishes the AN of ARCADIAN. What is happening is - the machine has been set into 
a printing mode and it keeps on going until it hits an internal halt. The X=0 sets 
such a halt thru the POKE function, where you want it. 

CONNECTOR for the 50-pin expansion port is a standard printed circuit device, with 
25 double-sided pins on 0.1 inch centers. I understand that the APPLE II uses this, 
as well as the SHUGART disc drive. There are some of these on the surplus market 
here, 3M No. 3415, and I can supply these at $2.50 ppd, including a 3” bit of flat 
cable that you could solder to. 


KEYBOARD project in wopk utilizes a CHERRY brand (?) keyboard wired in parallel 
with the keypad with some buffers so that either can be used. All letters and 
characters are where they belong, while the shift key allows the generation of the 
various WORDS. The Keyboard is the one advertised by JAMES ELECTRONICS, 1021 
Howard Ave., San Carlos CA 94070, at $29.95* "63 Key Uncoded leyborad". 


PRINTER project has been made to work .using a Type 43 Teletype machine and a kit 
for an interface available from ELECTRONIC SYSTEMS, P.0. Box 21638, San Jose, CA 
95151. their part #232A at $7. plus postage. I saw an ad of theirs in KILOBAUD, 
April, p.172. The schematic of this kit is included for you scratch-builders: 
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COLOR STANDARDS question came up, and I find that Bally would make an excellent 
color generator, as apparently their color output is very well controlled. I 
wonder if one of the TV-technical types can compare colors with a standard color 
generator output and tell us which color numbers give you the standard shades 
necessary for color TV work. 


BAN (KAN game program included this month is by Ernie Sams,248 S. Forest Street, 
Bellingham WA 98225. It has a novel twist over the old hangman game and is quite 
clever. It has a good scheme for entering characters without their appearing on 
the screen, and a search routine that can locate and account for multi-usage of 
a letter. I am also including Ernie's sheet of documentation that will be of help 
to a lot of us. 
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BANGMAN DOCUMENTATION: 

10 - 200 Initialize 

300 - 700 Ask for ar 


accept up to ten valid letters. 
<ord in two locations: 
pP track of the letters 


•ectly guessed. 


1300 
1430 - 1450 
1540 
1550 Sets 






oop. Allows 26 guesses. 

1 a letter by turning knob 11. 
i is set to -1 the letter has been use 
ge position to -1 and prints letter a 




-tom of the 

1600 ” Loop throu 9h the storage positions in 6< 

: the letter in the appropi 
shed in 800-1010 ar 
s to -1. Set flag 
t equal to 1 th(‘ ' 


1800 

2000 
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If the flag " 
did not match 
9600 plus cor 


: 10 ; 




go t 


» chosen letter 


2100 - 2200 Loop 

are -1 th< 
tions" ant 
9000 - 9020 The word v 
allowed. 

9030 - 9040 Print out 
9060 - 9160 Draw a gur 
9200 Change the 
9225 - 9340 Put six re 
effects. 
9350 Blank out 
9360 - 9370 Blank out 
9400 Uncover sc 


wrong guesses default to 9000 
Otherwise flag "Q" equals 0. 


i 600 (1). If all positic 


a was completely built, 
rd (from 600 
the word COLT 

sots in the body of the 
240 is the shot. 9260 

> full screen format. 


the 


9610 

9620 

9630 

9640 

9650 

9660 

9670 

9680 


RANDOM ART has been expanded with some added sound and shape enhancements by- 
Dave Stocker. Add the following to last month's program: 

15 &(0) =7; &(l)=7; &(9)=84; NT=0,&(2i)=i4; &(22)=255 
85 B=FC+RND(31)x8+4; &(2)=B; &(3)=B 
125 &(19)=X; &(18)=Y 
135 IF &(23)=1 RUN 

Press GO to set new parameters. (try 5,13) 
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TUTORIALS by Steve Walters (556 Langfield, Northville, ME 48167) and Dave Iback 
(19553 Dartmouth) follow. The first provides some very interesting basic data on 
character size and how to make them appear exactly where you want them. The 
second provides additional comments on the IF-type statements discussed on p. 4l. 

CHARACTER SIZE AMD PRINT LOCATION 


Every character is 5 pixels wide, with a one-pixel space added to the right of the 
character to provide a one-pixel separation between characters. Thus, the effective 
width of a character is 6 pixels. 

Every character is 7 pixels high, with a one-pixel space added beneath it to provide 
a one-pixel separation between lines of print. Thus, the effective height of a 
character is 8 pixels. 

The cursor is displayed as a 6-pixel wide by 8-pixel high box, the effective size 
of a character. When a program is running, the cursor is not visible. When a 
program ends, the cursor is displayed wherever it happens to be, preceeded by the 
line entry indicator ^ . 

If a ERINT command is not ended with a comma, the computer will leave a full space 
(6 pixels by 8 pixels) following the last character in the ERINT statement, and 
shift to the next print line. This end-of-statement space will appear as a white 
box against a black background, and will blank out anything located beneath it. 

If a ERINT command is ended with a comma, no space is added beyond the one-pixel 
space to the right of the last character, and the cursor remains at that location 
until another ERINT command is given. 

A character prints centered on its CY location, but not centered on its CX location. 
Given CX and CY as the print location of a character, the horizontal center of the 
character is CX-1 and the vertical center of the character is CY. The left edge of 
the character is located on CX-3 and the right edge of the character is located on 
CX+1. The top and bottom of the character are located on CY+3 and CY-3, respective¬ 
ly. 


Since the left edge of the screen display area is on CX=-80, and the left edge of a 
character is on CX-3, a character will print at CX=-77 even if the program specifies 
CX=-78, -79 or -80 prior to the ERINT command. However, this behavior is not 
duplicated at the right side of the screen. If CX is specified at + 78 , the right 
edge of the character will be on CX=+79 (CX+1, and the right limit of the screen 
display area); but if CX is specified at +79s the character will print beyond the 
CX=+79 limit. The cursor will shift lines in the process, and if a comma follows 
the ERINT command, the cursor will shift to CX=-77 on the same CY line. 

SCREEN PISELAY AREA RELATED TO CHARACTER SIZE 

The edge limits of the screen display area (CX=-80 to +79; CY=43 to -44) are 
functionally related to the character print size. The normal top line of print 
(without a CY value being specified) is CY=40, and thus the top of the characters 
on that line are at CY=43- There are 11 normal print lines, located at CY=4o, 32, 
24, 16, 8, 0, -8, -l 6 , -24, -32 and -40. The bottom line (CY=-4o) results in the 
bottom of the characters on that line being at CY=-43 and the one-pixel space below 
them being at CY=-44. 


SO 
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TUTORIAL 2 is a follow-up on last issue's comments on IF statements, again by 
Dave and Steve. 

The Bally BASIC interprets IF statements in terms of Boolean algebra concepts. 
In simple terms, each condition in an IF statement is assigned a value of one (+1) 
if it is true(i.e., if it is met) or a value of zero (0) if it is false (not met). 

The program then executes the IF statement if the resulting Boolean value of the 
IF statement is greater than zero, or proceeds to the next program line if the 
value is zero. 

Each condition in an IF statement must be placed in parentheses if there are two 
or more conditions, but it is optional if there is only one condition. Thus, 
simple IF statements may be programmed in either of two ways: 

1000 IF A=4 GOTO 2000 (uses 12 bytes) 

1000 IF (A=4) GOTO 2000 (uses 14 bytes) 

(if A=4, a value of 1 is given to the IF statement and the program 
branches to 2000) 

1000 IF A=4 IF B=5 GOTO 2000 (uses 16 bytes) 

1000 IF £A=4)+(B=5)=2 GOTO 2000 (uses 22 bytes) 

(if A=^+, a value of 1 is given to the IF statement, and if B=5, 
a value of 1 is also given, so that if both conditions are true 
the resulting value is 2 and the program branches to 2000; if 
only one of the two, or neither, is true, the program does not 
branch) 

Obviously, in both of the above cases, using the parentheses costs more in memory 
bytes and is thus not efficient. However, in more complicated IF statement 
conditions, parentheses result in less memory bytes being used; and ift some cases 
the saving is substantial. 

For example, consider a condition where A=4 or 5=5 or both (i.e.,A=4 and/or 5=5)» 
1000 IF A=4 GOTO 2000 

1010 IF 5=5 GOTO 2000 (uses 24 bytes) 

1000 IF (A=4)+(B=5) GOTO 2000 (uses 20 bytes) 

Even more memory savings would be involved if the condition was any one or more 
of three variable values. 


The following list illustrates other applications of special IF statements in 
the most byte-efficient form, based on the above principals: 
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Special IF statements: 

It A=1 and/or B=2 1000 IF (A=1) + (B=2) GOTO 2000 

If A=1 and B=2 1000 IF A=1 IF B=2 GOTO 2000 

If A=1 or B=2 but not both 1000 IF (A=1) - (B=2) GOTO 2000 
If A (i.e., if ABS (A) 0) 1000 IF A GOTO 2000 

This is also useful for hand control responses: 

1000 IF TR(1) GOTO 2000 will branch if trigger is pulled 

1000 IF JX(1) GOTO 2000 will branch if joystick moved sideways 

1000 IF JY(1) GOTO 2000 will branch if joystick moved back & forth 

If neither A not B equal zero 1000 IF A IF B GOTO 2000 

If A=1 and B=2 and C=3 1000 IF A=1 IF B=2 IF C=3 GOTO 2000 

If A=1 and/or B=2 and/or 0=3 1000 IF (A=1) + (B=2) + (0=3) GOTO 2000 

If A=1 or B=2 or C=3 but not more 

than one of these 1000 IF(A=1 ) + (B=2) + (0=3) =1 GOTO 2000 

If any two of the above three 

conditions are to be met 1000 IF(A=1) + (B=2) + (0=3) =2 GOTO 2000 

TUTORIAL 3 is another follow-up, this time by Jean Taillefer. 

The >= and =< symbols will work in an IF statement. They stand for 

"equal to or greater than" and "less than or equal to", 
respectively. The symbols are sometimes shown as - or -. 

The statement IF A>=B GOTO 100 is equivalent to 

IF A> B GOTO 100;IF A=B GOTO 100 or 
IF(A>B) + (A=B) GOTO 100 

A statement that is equivalent to the 'reverse sign' function on a calcu¬ 
lator can be accomplished with the following: -(A) 

If A is positive, the statement is evaluated as -(+A),for a negative number. 

If A is negative, the statement is evaluated as -(-A), for a positive number. 
This statement can be used with a variety of other statements, such as: 

PRINT -(A) 

B=-(A) 

IF -(A) = 1 GOTO 100 

This is different from the ABS command which always gives a positive number. 

DEAL ER in the St. Louis area is RTS Electronics/Gametronics, 356 Brookes Dr. 

731-2309 who report that they have all cartridges in stock, do mail order, and 
hold Football tournaments for players on Tuesdays,6-9pm and Saturdays, noon to 4. 
They mention that players are bringing their own hand controllers, which makes me 
think of the slot car operators... 

DEALER in Indiana is ABC Hobbycraft 2155 E.Morgan Ave,Evansville 4??11 (477-9661) 
who are open Sundays, and who act as the local hangout for Bally enthusiasts. 

GAMES 2007 PINBALL and 2006 SPACE INVADERS are scheduled for July release. There 
were a few words on these on p. 23 . 

STATEMENT When I started this paper late last year, I indicated in my subscrip¬ 
tion form that I would print material as it became available, but at least bi¬ 
monthly in this fiscal year. Well, I have been doing better than bi-monthly because 
material has been coming in at a much higher rate than I expected, so I have been 
publishing more or less monthly. This is a hobby output so publication is bound to 
be somewhat haphazard. Post-printing operations are starting to get unwieldy and I 
may have to get professional help in the folding/stapling area. Right now it looks 
like there will be at least 2 more issues to November, so you'll be getting at 
least a 50 # 'profit'. 
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ADS Sells Bally ARCADE with 4 hand controls,280ZZZAP,Baseball,Tiny BASIC. First 
certified check for $260. R.Dermody,8431 Timber Glen, San Antonio,TX 7825O 
A fantasy game package is available for those who enjoy the Dragon/Dungeon 
type of operation. G.McLimore,1210 E.Virginia St. Evansville IN 47711. Games are 
MULTIDIE(dice roller),DUNGEON GRAFIX I,DUNGEON GRAFIX II, and FANTASY PEOPLE 
for advanced players.$6 on your C-30,or $8 on his. no listings. 

BOWLING,No. of pins'hit and score shown $5on your tape or $6 on his. Add $2 
and either HANGMAN or CHECKERS will be put on other side. Listing for half price. 
John Collins,713 Bradford Dr. Ft. Walton Beach,FL 32548. 

Bob Weber is part of W&W Software Sales,6594 Swartout Rd. Algonac, MI 48001 
and has reorganized their software. They now have 4 cassettes with 5 programs 
each for $10 each in a preprogrammed form. Send for complete list/descriptions. 


PROGRAMMABLE KEYBOARD? The latest delay hinges on a Texas Instruments petition now 
before the FCC. They have asked for a change in the procedures by which computer/parts 
are approved for use. Apparently RCA tried this two years ago but never pushed very 
hard. The current procedure is for a computer manufacturer to have his whole system 
approved as meeting RFI, TVI, etc., limits, while the proposal is to have only the 
RF modulator inspected/approved. This has thrown the manufacturers into a tizzy as 
they feel that if the rules or standards are changed in the middle of the stream 
they'll have design and manufacturing costs to contend with. Bally, who haven't gone 
into production yet, feels they have to wait and see which way the FCC goes to avoid 
the 50-50 chance of being in error when the decision is made. For a company that 
thrives on gambling, those are unacceptable odds. Here is an excerpt from Consumer 
Ele ct ronics monthly 5/79 p. 31: 

Doubt about future standards for 
personal computers will delay product 
introductions as well as halt produc¬ 
tion of units introduced, but not yet in 
production. Bally, for one, will hold off 
manufacturing its upgraded game/com¬ 
puter introduced at Winter CES until a 
decision is reached. 


“We have two units to go with,” 
says national sales manager, Jack 
Nieman, “the one we showed at CES 
for around $650 and a lower-priced 
unit for around $350. But it could cost 
us millions of dollars if we make a 
decision on which unit to go with 
before the FCC makes a decision.” □ 


My discussions with Bally indicate that they expect a corporate discussion/decision 
around January, with delivery months later than that. Needless to say, the whole 
situation is disappointing and frustrating. Fortunately, we have some people work¬ 
ing on ways to 'make our own', and we can see a little glimmer of light, as reported 
earlier this issue. Subscribers who are working on a keyboard.memory addition, or 
any other "goodie" are urged to write me so that I can build up a team to get the 
needed hardware built and available for us all. 
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Robert Fabris, stapler 
3626 Morrie Dr. 

San Jose.CA 95127 








See note on Page 2 


HANGMAN by 


7 


* 


Errjie Sams 
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10 NT=2;CLEAR;PRINT "ONE PERSON KEYS IN A WO^D TO 10 LETTERS; 

OTHER USES KN & TR #1 TO GUESS—" f 
20 PRINT "ONLY 9 WRONG GUESSES ALLOWED." J 
40 PRINT;PRINT "PRESS GO" I ! 

50 I=KP;IF 1=13 CLEAR 1 ' 

100 E=0; Q=0 * 

"200 PRINT "ENTER WORD, THEN PRESS GO." ' ^ 

300 FOR A=0 TO 9 ~ s OSf- 

310 CY=31 

320 PRINT "LETTER #",#3,A+1 
330 BOX -55,23,50,8,2 
400 K=KP 

410 IF K=13 GOTO 790 

420 IF K>90 PRINT " INVALID";GOTO 310 
430 IF K<65 PRINT " INVALID";GOTO 310 
600 @ (A) =K; @(A+10)=K 
700 NEXT A 
790 CLEAR 

-80 0 FOR B=0 TO A-l 
900 Y=-32;X=-80+(Bx8)+3 
1010 BOX X,Y,7,3,1; NEXT B 

1100 CY=-24;CX=6;PRINT "USED LETTERS";CY=-32;CX=42;PRINT "BELOW: 


1200 FOR M=0 TO 25; @(M+20)=M+65; NEXT M 
1300 FOR D=0 TO 25 
1400 CY=31; CX=-80 
1410 PRINT "GUESS #",#3,D+1 
1420 BOX -33,19,94,16,2 
1430 G= (KN(1)+132)-r 10+65 
1440 CY=23;CX=-74;TV=G 
1450 IF TR(1)=0 GOTO 1430 
J i S aO ' Ig .' C>90 PBINT " INVALIDW 'T * GOTO 
^ 5 3- e - -feP .C^I i S mas " JT . TVAL i Utf § . SQtgQ , 1 4 0 Qi 
1540 IF §(G-45)=-l PRINT " HAS BEEN USED"; GOTO 1400 
.1550 ?(G-45)=-l; CY=-40; CX=-78+((G-65)x6); TV=G 
1600 FOR C=0 TO A-l 
1700 CY=-25 

1800 IF G=@(C) CX=-79+(Cx8)+3; TV=G: Q=l; @(C)=-l 
1900 NEXT C 

2000 IF Q#1 GOSUB 9600+(Ex10); E=E+1; IF E=9 GOTO 9000 
2050 Q=0 

2100 FOR F=0 TO A-l 

2110 IF @(F)#-1 GOTO 2200 

2120 NEXT F 

2130 CY=17; CX=-5D 

2140 PRINT "CONGRATULATIONS" 

2150 CY=0; CX=-80; PRINT "PRESS GO”; GOTO 50 

2200 NEXT D 

9000 CX=-80; CY=-9 

9010 PRINT "SORRY ABOUT THIS" 

9020 PRINT "THE WORD WAS" 

9030 FOR H=0 TO A-l 
9035 CX=-79+((Hx8)+3) 

9040 TV#@(H+10); NEXT H 

9060 BOX -16,0,10,10,1; BOX -8,7,27,5,1; BOX -19,11,1,2,1; 
BOX 4,11,1,2,1; BOX -9,4,1,4,1 


ofC 
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BANGMAN by Ernie Sams 


Page 2 


9110 BOX -6,3,1,5,17 BOX -8,0,6,1,1; BOX -18,7,3,3,2; 

BOX -17,7,2,1,1; BOX -14,7,3,3,2 
9160 BOX -14,7,1,1,1; BOX -11,7,1,3,2; BOX -9,6,2,1,2; 

BOX -7,8,3,1,2; BOX -7,7,1,2,2 
9200 & (9) =222; &(0)=87; & (1) =87; &{2)=80; &(3)=80 
9225 FOR U=0 TO 5 
9230 &(23)=255; &(21)=255 
9240 & ( 2 3) =0; &(21)=31 


9260 FOR V=5 TO 20; &(19)=V; NEXT V 
9270 & (21) =0; &(19)=0 
9300 X=RND{10)+55 
9310 Y=RND(12) 

9320 BOX X,Y,1,1,2 
9340 NEXT U 


9350 FC=80; &(10)=0 
9360 BOX 60,10,38,60,2 

9370 BOX -8,4,30,18,2 . 

9400 FOR Y=0 TO 176; &(10)=Y; NEXT Y 
9410 &(9)=50; FC=0 / 

9500 CX=-50; CY=16; PRINT "PRESS GO"^)GOTO 50 
9600 BOX 60,27,10,14,1; BOX 58,28,2,1,2; BOX 62,28,2,1,2 
BOX 60,24,6,1,2; RETURN 
9610 BOX 60,18,4,5,1; RETURN 
9620 BOX 60,6,16,20,1; RETURN 

9630 BOX 50,14,4,3,1; BOX 49,6,3,20,1; RETURN 

9640 BOX 70,14,4,3,1; BOX 70,6,3,20,1; RETURN 

9650 BOX 57,-12,3,15,1; RETURN 

9660 BOX 64,-12,3,15,1; RETURN 

9670 BOX 55,-20,8,2,1; RETURN 

9680 BOX 67,-20,8,2,1; RETURN 


NOTE; Because of the length of this program any spaces outside 
of quotation marks should not be keyed into the program 
(unless the computer automatically puts them in). Spaces 
were typed in to make the program more readable. 

There must be at least 90 unused bytes remaining. 



BANGMAN DOCUMENTATION: 


10 - 200 
300 - 700 

600 


800 - 1010 
1200 

1300 
1430 - 1450 
1540 
1550 

1600 - 1900 
1800 


2000 


2050 

2100 - 2200 


9000 - 9020 

9030 - 9040 
9060 - 9160 
9200 
9225 - 9340 

9350 
9360 - 9370 
9400 
9410 
9500 
SUBROUTINES 
9600 
9610 
9620 
9630 
9640 
9650 
9660 
9670 
9680 


Initialize and instructions. 

Ask for and accept up to ten valid letters. 

Stores the word in two locations: 

1. To keep track of the letters correctly guessed. 

2. To print the word if not guessed in nine tries. 

Set up blanks for the word. 

Store each letter of the alphabet for future use so the 
same letter is not used twice. 

Initiate guessing loop. Allows 26 guesses. 

Allows one to guess a letter by turning knob #1. 

If storage position is set to -1 the letter has been used. 
Sets value of storage position to -1 and prints letter at 
the bottom of the screen. 

Loop through the storage positions in 600 (1). If a match 
is found print the letter in the appropriate location(s) 
on the blanks established in 800-1010 and change the 
storage position value to -1. Set flag "Q" to 1. 

If the flag "Q" is not equal to 1 theil the chosen letter 
did not match a letter in the word so go to subroutine 
9600 plus counter E times 10 and print that portion of the 
man. Increment the E counter. If there have been nine 
wrong guesses default to 9000 to "bang" part of bangman. 
Otherwise flag "Q" equals 0. 

Loop through storage positions in 600 (1). If all positions 
are -1 then the word has been guessed. Print "congratula¬ 
tions" and press go to start a new game. 

The word was not guessed within the nine wrong guesses 

allowed. The man was completely built, so - 

Print out the word (from 600 (2)) on the blanks. 

Draw a gun with the word COLT on it. 

Change the screen to a border format. 

Put six random shots in the body of the man. Use sound 
effects. 9230-9240 is the shot. 9260 is the ricochet. 

Blank out screen 
Blank out man 

Uncover screen from top to bottom with man gone. 

Restore screen to full screen format. 

Press go to start a new game. 

Prints head, eyes, mouth. 

Prints neck. 

Prints body. 

Prints right arm. 

Prints left arm. 

Prints right leg. 

Prints left leg. 

Prints right foot. 

Prints left foot. 



.,K,g,Y.S ,I,N/.,-A i_A / . Q . RJ) . TO , 1 , 0 . fcg j ti 

.rre r ,R5^,A,u.orr,^ l e,R T,R,\,g,:s, xo, , > , 

.4,o.g.s,s, ,i ,T. ,w,i,T ,a ,n,q, , , , , , : i.j. 

■ , ,£,o, PRJM.TVVMO.R.e, ,<1.1^ , 

.,^.u,g,ss,63, ,i*, s,i ,n,5, ,K,M, 4 , rr.R.Ci), 

, , ,5,0 , .P, R,l,N,T,yP,R,\,M.T l> ,PX,E,S,S, ,6,0, , , , , 

, , S.Q, ■J >X.P.;.I,F, ,r,— ,1,3 t jC.L.EAH ■ , , , ■ , 

■ YAO, £' C d><)Q S 4>l . ■ ■ L.-1_L , , , 1 I. . ■ l ■ . 

, ,£,6,0, ,P,ft,l,H T, n ,E,N,T,E,R, .WO.R.D ,^, TX,E,K , , 

,-t-L^-i £ R,E , S , S, 6, 0,,,. 

, ,3,0,0, ,F,QR, T,0, .9, ■ ■ ■ . ..... . 


„js2iLiOi 


,3.*,0, ,P.R,I.MT, V VL,E.T,T,E,R, % # ,3, 


,4,o,o, X.g.kR 


4 . to, L LE_ Xr,l 3 , flfrTA 


4.2,0, ,I F. ,P,R,l,H,T,M,K>,V,A,L,I,h 


frO-T A A l^_ 


,4,3,0, , 1 ,F, ,K<4,S, ,P,RI,N,T,",IXN/,A.L ! I,D i 


,^Q,TO, 


4,o,o @£,A), g l K,&@( l A,+, 


,7-^Bi Xi E Al T i. Al. 


■ 73 -& &LE&&- 


300 , 3 jl ,<fr ,T, Q 


4g £ ,Y,= r,3,g,;,X,^-- i a^f l (,SK,a)^3 t 


(0,1,0, ,RO,X, ,X, v Y,^7, r 3. ; ,l,^,g,X,T; ,ft 


,U,o,o, ,CY» 




CX . =, 6 .:.P,R,rXT",US e 


T.PRS, 11 - CY,--.3,2 : : CX, = 42 


,P.R. I.M.T. ." BELOW,.- 


2 .0,0, .FOR, M=^T,0,25.;,<a(M+,2,0,) ■ 


,M-»,6.S;,Kl,eX,T M 


.1.3,00 . for i>-4>.To.z.£. 


,U PP, .CY,»AI,yC,X,«,-^ 


IA 1,0, 


.\4.2o 


,P,R, I , N, T, II ,6,U,&S,S ,>,4l 

_ 


,U 






Line N 

IM.3.Q, 


,',44,0, 


Statement(s) 


IAS8 I F. TRCl 1 40,T , 0, ,l,4-,3,6 


15,4,0, ,i.Rg/4-,4,s,y°,-.l, P . R.iKT'MU.s 


.REE.M OS.e.ti,6,0,T,0, ,1,4,4<^ 


.1.55,0, @('4-,4,5, , ),=,-,l,;, C,y j g 1 -,40, ;,CX ,^ 




.1 faOO. ,F, O.R. /»,«<*. .TO, A-,1, 


.' , 7 , 00 , ,<2Y--.25, 


1,8,00, ,1. F ,g,X,=,-,7, < 74,C,C« ,g L ) ,4, 3 L 






.1,4,00 ,N,e.X,t. ,C 


2P,PP. ,I.F. .0*1. 40,S,U,B $b,<trf:±(: E:*, l4) - 


1&S& 


,2,10,0, .Fog, ,F,-4i ,TO, ,4,-,l, 


,5,1,10, ,I,F, ,®C F,).#-J 


,2,1,20, .MEY.T, ,F, 


.21.30, £X=,l,7,),CX,= ,-,5,^ 


■6.0.TQ 2,200. 


.2 1.40, PR.I,N.T».CO.M.QR,flT,0,L,A,T, 1,0,US, 


. 2 1 SO g Y-^:.CK=.-.a4> t PRINT 11 PR ESS , 


g o, 11 , y^PJo^S^, 





3 t> g,;,aox- li| l| l > 2| , u , 2 ; & o,y- 7,%iU 
3,«,l ,«i2i y BoX-7*l a, 1,4,2,v 2. —,—,—,—,—,—. 
, ,< t , 2PP, ,<SY,4) ,^.2,2.2, ('.<0,-,S,7, $,<£ f, I, ),=■$,7,j. , 

■ , . , , 


Comments 




Comi 


Line tf Statement(s) 

. .<\,Z.Z£, ,F,O.R, , 0,-4 7 C.O S, . 

■ , y,3,a A(A * X * tS& , 

. q.g.4^ &U,3,),=</>,$. ,^/,2 1 / 1 ) 1 =3 1 l 1 , , , , 

. .q.Z.fc,o. Fo.R! &LSz&M jkL Iii EML^ / 

. ^,2,7,0, .k (A !,),=.<&$, Jfc.O ■<?■),-,<& , , , , ,V, , t ;, 

. .^,3,0,0, 1 , ,,. 1 ■> ..Ljl' 1..1 - -L—■ 

. 431.Q , % f,«.RW.V(,1.0, ■ 



s 1 ,^, 3 |^ 1 <S | V | 3 ■ L -1-1-1-1-1-1-1—1-!—I.. 1 .- 1 —1 

< ■ ,q, 3,4p, .N EXT ,U. . , , , 

g , , ^, 3 S,o, ,F,C g , 6 ,<ft$ , , , , , , ■ . 1 , . . j 

t ■ .^, 3 ,6,0, ,6,0,X, fa 4 ><is\&y 3 B< yG>^yZ , 
i , ,^, 37 , 0 , ,R,o,X, -, < g,> ) ,4 l ^.3,<^, 3 .l,fi,4),Z.. , ■ , , 

I Its ! ft( ,^), « i S;^ t J F,c l g^ _ l . 




Bally Arcade May 20, 1979 Steve Walters 

556 Langfield 

CHARACTER SIZE AND PRINT LOCATION Northville, Mi 48167 


Every character is 5 pixels wide, with a one-pixel space added to the 
right of the character to provide a one-pixel separation between 
characters. Thus, the effective width of a character is 6 pixels. 

Every character is 7 pixels high, with a one-pixel space added beneath 
it to provide a one-pixel separation between lines of print. Thus, the 
effective height of a character is 8 pixels. 

The cursor is displayed as a 6-pixel wide by 8-pixel high box, the 
effective size of a character. When a program is running, the cursor ( 

is not visible. When a program ends, the cursor is displayed wherever 
it happens to be, preceeded by the line entry indicator > . 

If a PRINT command is not ended with a comma, the computer will leave 
a full space (6pixels by 8 pixels) following the last character in the 
PRINT statement, and shift to the next print line. This end-of-statement 
space will appear as a white box against a black background, and will 
blank out anything located beneath it. 

If a PRINT command is ended with a comma, no space is added beyond the 
one-pixel space to the right of the last character, and the cursor 
remains at that location until another PRINT command is given. 

A character prints centered on its CY location, but not centered on its 
CX location. Given CX and CY as the print location of a character, the 
horizontal center of the character is CX-1 and the vertical center of 
the character is CY. The left edge of the character- is located on CX-3 
and the right edge of the character is located on CX+1. The top and 
bottom of the character are located on CY+3 and CY-3, respectively. 

Since the left edge of the screen display area is on CX=-80, and the 
left edge of a character is on CX-3, a character will print at CX=-77 
even if the program specifies CX=-78, -79 or -80 prior to the PRINT 
command. However, this behavior is not duplicated at the right side 
of the screen. If CX is specified at +78, the right edge of the 
character will be on CX=+79 (CX+1, and the right limit of the screen 
display area); but if CX is specified at +79, the character will print 
beyond the CX=+79 limit. The cursor will shift lines in the process, , 
and if a comma follows the PRINT command, the cursor will shift to 
CX=-77 on the same CY line. 

SCREEN DISPLAY AREA RELATED TO CHARACTER SIZE 


The edge limits of the .screen display area (CX=-80 to +79; CY=43 to -44) 
are functionally related to the character print size. The normal top 
ifnerof print (without a CY value being specified) is CY=40, and thus 
the top of the characters on that line are at CY=43. There are 11 
normal print lines, located at CY=40, 32, 24, 16, 8, 0, -8, -16, -24, 

-32 and -40. The bottom line (CY=-40) results in the bottom of the 
characters on that line being at CY=-43 and the one-pixel space 
below them being at CY=-44. 


-1- 




Similarly, the screen display area width is 160 pixels. This would 
allow 26 characters (26x6=156 pixels) with 4 pixels to spare. 

However, the first line of an entry starts with the line entry 
indicator > as the first character, and so only 25 characters and 
spaces can be entered. When 25 additional characters have been entered, 
the one-pixel space to the right of the last character is at CX=75: 
an additional character cannot fit in the remaining 4 pixels so the 
cursor shifts to the next line. On second and subsequent lines of an 
entry, 26 characters can be entered per line. 

When a program is being LISTed, the address of each line entry starts 
2 characters to the right of CX=-80, at CX=-68. Thus, the first line 
including address will contain 24 characters and spaces; and the 
second and subsequent lines will contain 26 characters and spaces. 

BOX COMMANDS RELATED TO PRINT LOCATION 


The dimensions of a box which will outline a printed statement, or 
blank it out, can be readily determined from the CX and CY values of 
the PRINT command. 

Framing,a printed statement or blanking it out with a reverse box . The smallest 
box which can frame a character is a reverse box: 

BOX CX-1,CY,7,9,3 

The above box is a rectangle which is 7 pixels wide and 9 pixels high superimposed 
over the 5 pixel by 7 pixel character. 

A more esthetically pleasing reverse box frame is obtained from a square box: 

BOX CX-1,CY,9,9,3 

A similar formula can be used to blank out a character: 

BOX CX-1,CY,5,7,2 

Note that the reverse box must be produced after the PRINT command for the statement 
being framed or blanked out has been executed. 


Framing a printed statement with an outline box . The outline box X is more useful 
than the reverse frame box because the outline box can be produced before the 
PRINT command is executed, and thus the character can be printed and reprinted inside 
the outline box as desired during a program. 

The smallest outline box which can frame a character is: 

BOX CX-1,CY,9,11,1 
BOX CX-1,CY ,7, 9,2 

Again, a square outline box is more esthetically pleasing: 

BOX CX-1,CY,11,11,1 
BOX CX-1 ,CY, 9, 9,2 


-2- 



Outline box for a statement of more than one character . Given CX and CY as 
the PRINT start location for a row of "n" characters (n=l or more), with 
a comma following the PRINT instruction, the outline box which will frame 
the row of "n" characters can be determined from the following: 

BOX CX-l+3(n-l),CY,ll+6(n-l),11,1 
BOX CX-l+3(n-l),CY, 9+6(n-l), 9,2 

Note: a reverse box could also frame the row of characters using either of the 
above BOX commands with a 3 as the ending code. 

If a comma is not desired to follow the PRINT instruction, then a larger outline 
box is required because of the 6-pixel space added after the last character: 

BOX CX-l+3(n-l),CY,21+6(n-l),11,1 
BOX CX-l+3(n-l),CY,19+6(n-l), 9,2 


Illustration of an outline box and a printed character inside it: 

BOX CX-l.CY,11,11,1 
BOX CX-1,CY, 9, 9,2 
CX=0; CY=0; PRINT "H", 


/ . Area cleared when 
/ "H", is printed 
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The Bally Basis interprets IF statements in terms of Boolean algebra concepts. 

In simple terms, each condition in an IF statement is assigned a value of one (+1) 
if it is true (i.e., if it is met) or a value of zero (0) if it is false (not met). 

The program then executes the IF statement if the resulting Boolean value of the 
IF statement is greater than zero, or proceeds to the next program line if the 
value is zero. 


Each condition in an IF statement must be placed in parentheses if there are two 
or more conditions, but it is optional if there is only one condition. Thus, 
simple IF statements may be programed in either of two ways: 

1000 IF A=4 GOTO 2000 (uses 12 bytes) 

1000 IF (A=4) GOTO 2000 (uses 14 bytes) 

(if A=4, a value of 1 is given to the IF statement and the 
program branches to 2000) 

1000 IF A=4 IF B=5 GOTO 2000 (uses 16 bytes) 

1000 IF (A=4)+(B=5)=2 GOTO 2000~ (uses 22 bytes} 

(if A=4 a value of 1 is given to the IF statement, and if B=5 
a value of 1 is also given, so that if both conditions are true 
the resulting value is 2 and the program branches to 2000; 
if only one of the two or neither is true, the program does not 
branch) 

Obviously, in both of the above cases, using the parentheses costs more in memory 
bytes and is thus not efficient. However, ,in more complicated, IF statement 
conditions, parentheses result in less memory bytes being used; and in some cases 
the savings is substantial. • 


For example, consider a condition where A=4 or B=5 or both (i.e., A=4 and/or B=5): 


1000 IF A=4 GOTO 2000 
1010 IF B=5 GOTO 2000 


(uses 24 bytes) 


1000 IF (A=4)+(B=5) GOTO 2000 (uses 20 bytes) 

Even more memory savings would be involved if the condition was any one or more 
of three variable values. 


The attached list illustrates other applications of special IF statements in 
the most byte-efficient form, based on the above principals. 
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IF A=1 and/or B=2 1000 IF (A=1)+(B=2) GOTO 2000 

IF A=1 and B=2 1000 IF A=1 IF B=2 GOTO 2000 

IF A=1 or B=2 

but not both 1000 IF (A=1)-(B=2) GOTO 2000 

IF A#0 (i.e., IF ABS(A) >0) 1000 IF A GOTO 2000 

This is also useful for hand control responses: 

1000 IF TR(1) GOTO 2000 will branch if trigger is pulled 

1000 IF JX(1) GOTO 2000 will branch if joystick is moved left or right 

1000 IF JY(1) GOTO 2000 will branch if joystick is moved forward or 

backward 

IF neither A nor B equal zero 1000 IF A IF B GOTO 2000 

IF A=1 and B=2 and C=3 1000 IF A=1 IF B=2 IF C=3 GOTO 2000 

IF A=1 and/or B=2 and/or 03 1000 IF (A=l)+(B=2)+(C=3) GOTO 2000 

IF A=1 or B=2 or C=3 but not more 

_ than one of these 1000 IF (A=l)+(B=2)+(C=3)=l GOTO 2000 

IF any two of three conditions 

j are met _ ,1000 IF (A=l )+(B=2)+(C=3)=2-GOTO 2000 , 
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Bob Fabris, 

We would like this in the next Arcadian. Keep up the good work. We wrote 
Bally in support of the expansion module. 

Bob & Jeri Weber 


W 4 W S0FTWARE SALES 
6594 SWART0UT R0AD 
ALG0NAC, MICHIGAN 48001 


DEAR BALLY BUFF. 

WE HAVE RE0RGANIZ ED 0UR S0FTWARE AND HAVE C0ME UP WITH 3 CASSETTES 
WITH 5 PR0GRAMS PER TAPE AT $10.00 EACH. WE WILL N0 L0NGER TAKE 
0RDERS T0 REC0RD 0N Y0UR TAPES. THE SELECTI0NS WILL BE PRE-PACKAGED 
T0 ENABLE US T0 KEEP UP WITH THE DEMAND F0R 0RDERS. IT WILL ALS0 
ALL0W US TIME T0 PR0GRAM NEW GAMES F0R FUTURE TAPES. 


S0FTWARE F0R TINY BASIC, W 4 W TAPE #1 

0THELL0-O T0 2 PLAYERS, KEEPS SC0RE THR0UGH0UT THE GAME. 

VAN GAM-1 PLAYER 

FLIGHT SIMULAT0R-LEARN THE SKILL 0F FLYING. 

SUB SEARCH-1 PLAYER. FIND THE ENEMY SUB BEF0RE Y0U ARE BL0WN UP. 
HANGMAN-Y0U PUT IN W0RDS, MACHINE MIXES THEM UP F0R Y0U. 


S0FTVARE F0R TINY BASIC, W 4 W TAPE #2 

C0NCENTRATI0N-2 T0 4 PLAYERS MATCH SKILLS. 

SPACE CHASE-2 PLAYERS. 

SL0T MACHINE-PRACTICE F0R VEGAS. 

GAME 0F LIFE-WATCH THE BIRTH, GR0WTH, AND DEATH 0F A C0L0NY 0F CELLS 
MATH QUIZ-PR0BLEMS IN ADDITI0N, SUBTRACTI0N, DIVISI0N AND 
MULTIPLICATI0N. SKILL LEVEL ADJUSTS T0 PLAYER. 


S0FTWARE F0R TINY BASIC, W 4 W TAPE #3 

BI0RHYTHMS-SEE H0W Y0U ARE G0ING T0 D0 T0DAY• 

ALIEN PATR0L-KILL ALL THE ALIENS AND RETURN T0 BASE, BEF0RE Y0U RUN 
0UT 0F FUEL. 

TIC TAC T0E-1 PLAYER. 

MASTERMIND-GUESS C0MPUTER’S 4 DIGIT NUMBER. 

CALENDAR-ANY M0NTH, ANY YEAR. 


0RDERS WILL BE HANDLED AS QUICKLY AS P0SSIBLE, BUT Y0U SH0ULD ALL0W 
3 WEEKS F0R DELIVERY. 


THANK Y0U, 



Bob, 

We have expanded our tape selection. Could you please add it to the next issue. 


W A W S0FTWARE SALES 


TAPE #4 IN 0UR SERIES IS N0W AVAILABLE, AND INCLUDES THE F0LL0WING 
PR0GRAMS: 


CYL0N RAIDERS-SH00T D0WN THE 10 CYL0NS WITH Y0UR VIPER 
CHECKERS-1 PLAYER. PLAY AGAINST THE C0MPUTER. 

BL0CK BUSTER-KN0CK D0WN THE BRICK WALLS. 

MENSA TEST-8 SAMPLE IQ QUESTI0NS T0 TEST Y0URSELF WITH. 

RUSSIAN R0ULETTE-SEE IF Y0U CAN SURVIVE 10 PULLS 0F THE TRIGGER. 

M0RE TAPES WILL BE F0RTHC0MING AND WILL BE ANNOUNCED AS S00N AS 
THEY ARE AVAILABLE. 


-fS 1 , -UtrvJ 

OAJ 




THANK Y0U 



LIST 

5 CLEAR 

10 FOR A=1TO 20 

11 NT=RND (20) 

20 FOR I=1T0 4 

30 &(1-1)=RNB (255) 

40 NEXT I 
50 S(9)=RND (255) 

60 S(10)=RND (255) 

70 FOR 1=16T0 23 
80 X(I)=RNB (255) 

90 NEXT I 
95 CLEAR 

100 PRINT "GOTO GOTO GOTO GOTO GOTO GOTO 
110 NEXT A 


BOB, THIS PGN WAS PRINTED WITH A TELETYPE MODEL 43 TERMINAL 

THE INTERFACE IS THE ONE SOLD BY 

ELECTRONIC SYSTEMS 

P.O. BOX 21638 

SAN JOSE, CA 95151 

PART tf 232A $7.00 IT IS A KIT AND COMES WITH ALL PARTS 

IF SOMEONE WANTS TO BUILD ONE FROM SCRATCH HERE IS THE CKT. 

this Model 43 DID NOT HAVE A AUTO LINE FEED SO I HAD TO WATCH FOR THE RETURN 

LINE FEED BUTTON. 

THE PGM LISTED ABOVE IS ONE THAT SETS ALL SCREEN AND MUSIC REGISTERS TO RND. 
IT COULB GO ON FOR YEARS AND NEVER REPEAT ITSELFB 


JERRY L. TINDLE 
8414 STAUNTON DR. 
AUSTIN, TEXAS 78758 


AND HIT THE 



Ic i> 7V/ - of 




1 # . RANDOM ART v 

4 . BY E. SAMS 

3 . EXPANDED BY / ,0, 

4 . DAVID STOCKER w ' ; 

5 . 5/26/70-—- 

10 X=0;Y=0r&/0)=7;&(!)= 

15 &(31)=14;&(22)=255 

*20 INPUT "WIDTH"W 
c 30 INPUT "HEIGHT"H 
- #0 X=X+W;Y=Y+H 
= 50 CLEAR 

s*60 IF X)159W=-W;FC=RND (31 )x8+4 
4* 70 IF X<2W=-W 

80 IF Y>79H=-H;B=FC+RND (31)x8+4;&(2)=B;&(3)=B 

= 90 IF Y<2H=-H ^-—...-^ 

^100 X=X+W;Y=Y+H w 

- 110 IF X<1X=1 

- 120 IF Y<1Y=1 

125 &(19)=X;&(18)=Y * 

-130 BOX 0,0 , X, Y, 3 
135 IF &(23)=1RUN * 

= 140 GOTO 60 



Press GO to set new parameters. 


